package Wix::Tag::RegistryKey;

use parent qw/Wix::Tag/;

sub new() {
	my ($class, $args) = @_;
	
	my $self = Wix::Tag->new({TAG => 'RegistryKey'});
	
	$self->addAttr('Root', $args->{ROOT});
	$self->addAttr('Key', $args->{KEY});
	$self->addAttr('Action', $args->{ACTION});
	
	return bless($self, $class);
}

sub addRegistryKey($) {
	my ($self, $registrykey) = @_;

	$self->addElement('Wix::Tag::RegistryKey', $registrykey);	
} 

sub addRegistryValue($) {
	my ($self, $registryvalue) = @_;

	$self->addElement('Wix::Tag::RegistryValue', $registryvalue);	
}

1;